home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 2, No. 08 (1983-04)(Softdisk)(Disk 2 of 2 Side A).zip / Softdisk Magazette Volume 2, No. 08 (1983-04)(Softdisk)(Disk 2 of 2 Side A).do / PAL.07869.FORDICE.DEC.82.B.bas < prev    next >
BASIC Source File  |  1996-12-24  |  1KB  |  23 lines
  1. 1  REM <CTRL-H><CTRL-H><CTRL-H><CTRL-H><CTRL-H><CTRL-H><CTRL-H>==========================<CTRL-M>PAL.07869.FORDICE.DEC.82.B<CTRL-M>==========================<CTRL-M><CTRL-M>
  2. 10 D$ =  CHR$(4)
  3. 11  TEXT : HOME : POKE  -16300,0: POKE  -16302,0
  4. 12  GOTO 20
  5. 15 K =  PEEK( -16384): IF K <128  THEN 15
  6. 16  POKE  -16368,0: RETURN 
  7. 20  PRINT D$;"BLOAD ^": GOSUB 15
  8. 30  PRINT D$;"BLOAD ^^": GOSUB 15
  9. 40  PRINT D$;"BLOAD ^^^": GOSUB 15
  10. 100  HOME : VTAB 8: HTAB 7: PRINT "FROM:<CTRL-M><CTRL-M>      MIKE FORDICE<CTRL-M>      RANDOLPH TOWNSHIP,<CTRL-M>      NEW JERSEY 07869"
  11. 110  FOR I = 1 TO 1600: NEXT I: PRINT D$;"RUN PAL.MENU"
  12. 65535  REM ====================
  13. 65535  REM = THESE LINES WERE =
  14. 65535  REM =   RENUMBERED     =
  15. 65535  REM = WITH BIGLINER AS =
  16. 65535  REM =   DESCRIBED      =
  17. 65535  REM = ON THE SCREENS   =
  18. 65535  REM =                  =
  19. 65535  REM =   MIKE FORDICE   =
  20. 65535  REM = RANDOLPH TOWNSHIP=
  21. 65535  REM = NEW JERSEY 07869 =
  22. 65535  REM =  DECEMBER 1982   =
  23. 65535  REM ====================